function [k,res_tab,f,ZZ] = prep_results(results,fDATA)
f = [];
for n = 1:110,
    ERROR_SERIES = fDATA(n).e;
    INST = fDATA(n).X;
    ind1 = logical(1-isnan(ERROR_SERIES));
    ind2 = logical(1-isnan(INST));
    indall = [ind1, ind2];
    indOK = all(indall,2);
    flagg = sum(indOK);
    f = [f; flagg];
end,
k = 0;
for n = 1:5
    res_tab(n).resb = [];
    res_tab(n).resa = [];
    ZZ(n).uni = [];
    ZZ(n).multi = [];
end,

for i = 1:size(results,1);
    labels = ['forecaster ',num2str(i)];
    if f(i,1) > 80;
        tmpa = [];
        tmpb = [];
        res = results(i,:);
        k = k + 1;
        for j = 1:5;
            %   Uniivariate
            temp1a = [res(1,j).dd,2*res(1,j).alfa_1-1,res(1,j).Jtest_1(end,1),res(1,j).test_res90_1,res(1,j).test_res95_1,res(1,j).test_res99_1];
            if res(1,j).test_res95_1 == 1
                ZZ(j).uni = [ZZ(j).uni ; [2*res(1,j).alfa_1-1 , norm(2*res(1,j).alfa_1-1,2)] ];
            end
            tempa = [j temp1a];
            tmpa = [tmpa;tempa];
            res_tab(j).resa = [res_tab(j).resa; temp1a];
            %   Multivariate
            temp1b = [res(1,j).dd,2*res(1,j).alfa_2-1,res(1,j).Jtest_2(end,1),res(1,j).test_res90_2,res(1,j).test_res95_2,res(1,j).test_res99_2];
            if res(1,j).test_res95_2 == 1
                ZZ(j).multi = [ZZ(j).multi ; [2*res(1,j).alfa_2-1 , norm(2*res(1,j).alfa_2-1,2)] ];
            end
            tempb = [j temp1b];
            tmpb = [tmpb;tempb];
            res_tab(j).resb = [res_tab(j).resb; temp1b];
        end,
    end,
end,









